home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 4 / Apprentice-Release4.iso / Demos / AppMaker 2.0b3 / Demo AppMaker 1.5 / Demo AppMaker™ / Demo AppMaker™.rsrc / TmpC_304_EachMenuItem < prev    next >
Encoding:
Text File  |  1992-04-08  |  1.9 KB  |  79 lines

  1. %case defineItem%
  2.     #define %MenuName%%MenuItemName%%    %%MenuItemNr% 
  3. %case includeDialog%
  4.     %if dialogExists%
  5.         #include "%dlogname%.h"
  6.     %endif%
  7. %case dialogDependency%
  8.     %if dialogExists%
  9.         %if lang = AUX%
  10.             %dlogname%.h \
  11.         %else%
  12.             %dlogname%.h ∂
  13.         %endif%
  14.     %endif%
  15. %case doItemProto%
  16.     %if MenuItemName = Close%
  17.     %elsif MenuItemName = Quit%
  18.     %else%
  19.         %if dialogExists%
  20.             %if modal%
  21.             %elsif modalOneShot%
  22.                 static void        Do%MenuItemName% (void);
  23.             %endif%
  24.         %else%
  25.             static void        Do%MenuItemName% (void);
  26.         %endif%
  27.     %endif%
  28. %case doItem%
  29.     %if MenuName = File%
  30.         %DoMenuItem.File%
  31.     %elsif MenuName = Edit%
  32.         %DoMenuItem.Edit%
  33.     %elsif About%
  34.         /*----------*/
  35.         static void Do%MenuItemName% (void)
  36.         {
  37.             short            itemNr;
  38.             
  39.             itemNr = Alert (AboutID, nil);
  40.         } /*Do%MenuItemName%*/
  41.          
  42.     %else%
  43.         %DoMenuItem%
  44.     %end if%
  45. %case handleItem%
  46.     case %MenuName%%MenuItemName%:
  47.             Do%MenuItemName% ();
  48.         break;
  49. %case enableFile%
  50.     %if menuitemname = Close%
  51.         Enable (FileClose,        isFront);
  52.     %elsif menuitemname = Save%
  53.         Enable (FileSave,        isDirty);
  54.     %elsif menuitemname = SaveAs%
  55.         Enable (FileSaveAs,        isCur);
  56.     %elsif menuitemname = Revert%
  57.         Enable (FileRevert,        isDirty);
  58.     %endif%
  59. %case enableEdit%
  60.     %if menuitemname = Undo%
  61.         Enable (EditUndo,        isDesk);
  62.     %elsif menuitemname = Cut%
  63.         Enable (EditCut,        isDesk || isSelected);
  64.     %elsif menuitemname = Copy%
  65.         Enable (EditCopy,        isDesk || isSelected);
  66.     %elsif menuitemname = Paste%
  67.         Enable (EditPaste,        isDesk || isScrap);
  68.     %elsif menuitemname = Clear%
  69.         Enable (EditClear,        isDesk || isSelected);
  70.     %elsif menuitemname = SelectAll%
  71.         Enable (EditSelectAll,    isText);
  72.     %elsif menuitemname = CreatePublisher%
  73.         Enable (EditCreatePublisher,    sysConfig.hasEditionMgr && isSelected);
  74.     %elsif menuitemname = SubscribeTo%
  75.         Enable (EditSubscribeTo,        sysConfig.hasEditionMgr && (!isSelected));
  76.     %elsif menuitemname = SubscriberOptions%
  77.         Enable (EditSubscriberOptions,    false /* (publisherSelected || subscriberSelected) */);
  78.     %endif%
  79.